package com.ruoyi.test_tree.service.impl;

import java.util.ArrayList;
import java.util.Iterator;
import java.util.List;
import com.ruoyi.common.utils.DateUtils;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ruoyi.test_tree.mapper.SysTreeDictMapper;
import com.ruoyi.test_tree.domain.SysTreeDict;
import com.ruoyi.test_tree.service.ISysTreeDictService;

/**
 * 系统树形字典Service业务层处理
 * 
 * @author ruoyi
 * @date 2025-08-21
 */
@Service
public class SysTreeDictServiceImpl implements ISysTreeDictService 
{
    @Autowired
    private SysTreeDictMapper sysTreeDictMapper;

    /**
     * 查询系统树形字典
     * 
     * @param dictId 系统树形字典主键
     * @return 系统树形字典
     */
    @Override
    public SysTreeDict selectSysTreeDictByDictId(Long dictId)
    {
        return sysTreeDictMapper.selectSysTreeDictByDictId(dictId);
    }

    /**
     * 查询系统树形字典列表
     * 
     * @param sysTreeDict 系统树形字典
     * @return 系统树形字典
     */
    @Override
    public List<SysTreeDict> selectSysTreeDictList(SysTreeDict sysTreeDict)
    {
        return sysTreeDictMapper.selectSysTreeDictList(sysTreeDict);
    }

    /**
     * 新增系统树形字典
     * 
     * @param sysTreeDict 系统树形字典
     * @return 结果
     */
    @Override
    public int insertSysTreeDict(SysTreeDict sysTreeDict)
    {
        // 生成自动顺序编码
        String dictValue = generateDictValue(sysTreeDict.getParentId());
        sysTreeDict.setDictValue(dictValue);
        
        sysTreeDict.setCreateTime(DateUtils.getNowDate());
        return sysTreeDictMapper.insertSysTreeDict(sysTreeDict);
    }
    
    /**
     * 生成字典编码
     * 
     * @param parentId 父节点ID
     * @return 生成的字典编码
     */
    private String generateDictValue(Long parentId) {
        if (parentId == null || parentId == 0) {
            // 根节点，生成两位顺序编码
            String maxRootCode = sysTreeDictMapper.selectMaxRootDictValue();
            if (maxRootCode == null) {
                // 如果没有根节点，从01开始
                return "01";
            } else {
                // 解析当前最大编码，生成下一个编码
                int maxCode = Integer.parseInt(maxRootCode);
                maxCode++;
                // 格式化为两位，不足前面补0
                return String.format("%02d", maxCode);
            }
        } else {
            // 子节点，生成父节点编码+两位顺序编码
            // 首先获取父节点信息
            SysTreeDict parentDict = sysTreeDictMapper.selectSysTreeDictByDictId(parentId);
            if (parentDict == null || parentDict.getDictValue() == null) {
                throw new RuntimeException("父节点不存在或编码为空");
            }
            
            String parentCode = parentDict.getDictValue();
            
            // 查询该父节点下的最大子节点编码
            String maxChildCode = sysTreeDictMapper.selectMaxChildDictValueByParentId(parentId);
            
            if (maxChildCode == null) {
                // 如果没有子节点，在父节点编码后加01
                return parentCode + "01";
            } else {
                // 从最大子节点编码中提取后两位顺序编码
                String sequencePart = maxChildCode.substring(parentCode.length());
                int sequence = Integer.parseInt(sequencePart);
                sequence++;
                // 格式化为两位，不足前面补0，与父节点编码拼接
                return parentCode + String.format("%02d", sequence);
            }
        }
    }

    /**
     * 修改系统树形字典
     * 
     * @param sysTreeDict 系统树形字典
     * @return 结果
     */
    @Override
    public int updateSysTreeDict(SysTreeDict sysTreeDict)
    {
        sysTreeDict.setUpdateTime(DateUtils.getNowDate());
        return sysTreeDictMapper.updateSysTreeDict(sysTreeDict);
    }

    /**
     * 批量删除系统树形字典
     * 
     * @param dictIds 需要删除的系统树形字典主键
     * @return 结果
     */
    @Override
    public int deleteSysTreeDictByDictIds(Long[] dictIds)
    {
        return sysTreeDictMapper.deleteSysTreeDictByDictIds(dictIds);
    }

    /**
     * 删除系统树形字典信息
     * 
     * @param dictId 系统树形字典主键
     * @return 结果
     */
    @Override
    public int deleteSysTreeDictByDictId(Long dictId)
    {
        return sysTreeDictMapper.deleteSysTreeDictByDictId(dictId);
    }

    /**
     * 获取树形结构数据
     * 
     * @return 树形结构数据
     */
    public List<SysTreeDict> selectTreeDictTree()
    {
        // 默认调用带参数方法，不进行特定筛选
        return selectTreeDictTree(null);
    }
    
    /**
     * 获取树形结构数据（带筛选条件）
     * 
     * @param dictValueStartWith dictValue前缀
     * @return 树形结构数据
     */
    public List<SysTreeDict> selectTreeDictTree(String dictValueStartWith)
    {
        // 创建查询条件
        SysTreeDict sysTreeDict = new SysTreeDict();
        // 查询所有数据
        List<SysTreeDict> dictList = sysTreeDictMapper.selectSysTreeDictList(sysTreeDict);
        
        // 过滤数据
        List<SysTreeDict> filteredList = new ArrayList<>();
        for (SysTreeDict dict : dictList) {
            // 如果有前缀筛选条件，则只保留以该前缀开头的数据
            if (dictValueStartWith != null) {
                if (dict.getDictValue() != null && dict.getDictValue().startsWith(dictValueStartWith)) {
                    filteredList.add(dict);
                }
            } 
            // 否则，如果没有前缀筛选条件，且当前是默认调用（用于地理位置），则使用原来的'020'前缀筛选
            else if (dict.getDictValue() != null && dict.getDictValue().startsWith("020")) {
                filteredList.add(dict);
            }
        }
        
        return buildDictTree(filteredList);
    }

    /**
     * 构建树形结构数据
     * 
     * @param dictList 字典列表
     * @return 树形结构数据
     */
    private List<SysTreeDict> buildDictTree(List<SysTreeDict> dictList)
    {
        List<SysTreeDict> returnList = new ArrayList<SysTreeDict>();
        List<Long> tempList = new ArrayList<Long>();
        for (SysTreeDict dict : dictList)
        {
            tempList.add(dict.getDictId());
        }
        for (Iterator<SysTreeDict> iterator = dictList.iterator(); iterator.hasNext();)
        {
            SysTreeDict dict = (SysTreeDict) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dict.getParentId()))
            {
                recursionFn(dictList, dict);
                returnList.add(dict);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = dictList;
        }
        return returnList;
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysTreeDict> list, SysTreeDict t)
    {
        // 得到子节点列表
        List<SysTreeDict> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysTreeDict tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                // 判断是否有子节点
                Iterator<SysTreeDict> it = childList.iterator();
                while (it.hasNext())
                {
                    SysTreeDict n = (SysTreeDict) it.next();
                    recursionFn(list, n);
                }
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysTreeDict> getChildList(List<SysTreeDict> list, SysTreeDict t)
    {
        List<SysTreeDict> tlist = new ArrayList<SysTreeDict>();
        Iterator<SysTreeDict> it = list.iterator();
        while (it.hasNext())
        {
            SysTreeDict n = (SysTreeDict) it.next();
            if (n.getParentId().longValue() == t.getDictId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysTreeDict> list, SysTreeDict t)
    {
        return getChildList(list, t).size() > 0 ? true : false;
    }
}
